home *** CD-ROM | disk | FTP | other *** search
/ Aminet 20 / Aminet 20 (1997)(GTI - Schatztruhe)[!][Aug 1997].iso / Aminet / dev / c / stormamigalibr.lha / stormamiga_lib-v43_00r / HD-Installer_script < prev    next >
Text File  |  1997-05-31  |  19KB  |  773 lines
  1. ;************************************************************
  2. ;*    stormamiga.lib Installer Version 2.5  30. May 1997    *
  3. ;*                                                          *
  4. ;*            © Copyright 1996/97 by COMPIUTECK             *
  5. ;*                written by Matthias Henze                 *
  6. ;*       english translation written by Thomas Blätte       *
  7. ;*                                                          *
  8. ;************************************************************
  9. ;
  10. ; $VER: HD-Installer_script 2.5 (30.05.97)
  11.  
  12. (set stormamiga-Version "Version 43.00 alpha")
  13. (set stormamiga-Datum "30. Mai 1997")
  14. (set stormamiga-Datum_e "30. May 1997")
  15.  
  16. ;====================================================================
  17. ; Initialisierungen
  18. ;====================================================================
  19.  
  20. (set @default-dest "")
  21.  
  22. (if (= @language "deutsch")
  23.  (
  24.     (set #welcome (cat
  25.     "\nWillkommen bei der Installation der \n\n"
  26.     "\"stormamiga.lib\"\n\n"
  27.     ""stormamiga-Version" vom "stormamiga-Datum"\n\n"
  28.     "Dieses Skript installiert die \"stormamiga.lib\",\n"
  29.     "entsprechend Ihrer Angaben, auf Ihre Festplatte.\n\n\n"
  30.     "© Kopierrecht 1996/97 bei COMPIUTECK\n"
  31.     "geschrieben von Matthias Henze"))
  32.     
  33.     (set #Sprachstandard_Auswahl (cat
  34.     "\nMöchten Sie die \"stormamiga.lib\" für \"ANSI C\" oder für \"C++\" installieren.\n"))
  35.     
  36.     (set #C         " ANSI C")
  37.     (set #C++       " C++")
  38.     
  39.     
  40.     (set #startup_Auswahl (cat
  41.     "\nIn \"ANSI C\" ist es möglich die Startupcodes \"stormamiga_startups.o\" und \"stormamiga_nc_startups.o\" zu verwenden. Dadurch werden die Programme etwas kürzer.\n"
  42.     "\nWelche(n) Startupcode(s) möchten Sie installieren?\n"))
  43.     
  44.     (set #FAR_C_Startupcode     " \"stormamiga_startups.o\" (Far Code)")
  45.     (set #NEAR_C_Startupcode    " \"stormamiga_nc_startups.o\" (Near Code)")
  46.     
  47.     
  48.     (set #C++_startup_Auswahl (cat
  49.     "\nIn \"C++\" ist es möglich die Startupcodes \"stormamiga_C++_startups.o\" und \"stormamiga_nc_C++_startups.o\" zu verwenden. Dadurch werden die Programme etwas kürzer.\n"
  50.     "\nWelche(n) Startupcode(s) möchten Sie installieren?\n"))
  51.     
  52.     (set #FAR_C_C++_Startupcode     " \"stormamiga_C++_startups.o\" (Far Code)")
  53.     (set #NEAR_C_C++_Startupcode    " \"stormamiga_nc_C++_startups.o\" (Near Code)")
  54.     
  55.     
  56.     (set #Versions_Auswahl (cat
  57.     "\nWählen Sie die Bibliothek(en) aus, die Sie installieren möchten.\n"))
  58.     
  59.     (set #C++-Lib                   " Erweiterungsbibliothek für C++")
  60.     (set #MC68EC020+                " Basisbibliothek für MC68EC020+")
  61.     (set #MC68EC020+_&_MC68881+     " Erweiterungsbibliothek für MC68881+")
  62.     (set #MC68040+                  " Erweiterungsbibliothek für MC68040+")
  63.     (set #MC68060                   " Erweiterungsbibliothek für MC68060")
  64.     
  65.     (set #Code_Modell_Auswahl (cat
  66.     "\nDie \"stormamiga.lib\" gibt es für das kleine und das große Code-Modell.\n"
  67.     "\nWelche Version(en) möchten Sie installieren?\n"))
  68.     
  69.     (set #Code_Modell_Auswahl_881 (cat
  70.     "\nDie \"stormamiga_881.lib\" gibt es für das kleine und das große Code-Modell.\n"
  71.     "\nWelche Version(en) möchten Sie installieren?\n"))
  72.     
  73.     (set #Code_Modell_Auswahl_040 (cat
  74.     "\nDie \"stormamiga_040.lib\" gibt es für das kleine und das große Code-Modell.\n"
  75.     "\nWelche Version(en) möchten Sie installieren?\n"))
  76.     
  77.     (set #Code_Modell_Auswahl_060 (cat
  78.     "\nDie \"stormamiga_060.lib\" gibt es für das kleine und das große Code-Modell.\n"
  79.     "\nWelche Version(en) möchten Sie installieren?\n"))
  80.     
  81.     (set #FAR_C     " großes Code-Modell")
  82.     (set #NEAR_C    " kleines Code-Modell")
  83.     
  84.     (set #Standardbeispiele_Auswahl (cat
  85.     "\nUm die Vorteile der \"stormamiga.lib\" etwas zu verdeutlichen, habe ich einige Beispiele beigelegt.\n"
  86.     "\nMöchten Sie diese Beispiele installieren.\n"))
  87.     
  88.     (set #ja    "ja")
  89.     (set #nein  "nein")
  90.     
  91.     (set #Beispiele_Liste (cat
  92.     "Installation der Beispiele.\n"
  93.     "Bitte wählen Sie ein Laufwerk oder ein Verzeichnis.\n"
  94.     "Ein Verzeichnis \"stormamiga_lib_Examples\" wird automatisch erzeugt."))
  95.     
  96.     (set #Spezialbeispiele_Auswahl (cat
  97.     "\nUm die Vorteile und Anwendungsmöglichkeiten der Spezialfunktionen etwas zu verdeutlichen, habe ich einige Beispiele beigelegt.\n"
  98.     "Wenn Sie bereits die Standardbeispiele installiert haben, wird automatisch das gleiche Zielverzeichnis benutzt. Ansonsten können Sie ein Zielverzeichnis auswählen.\n"
  99.     "\nMöchten Sie diese Beispiele installieren.\n"))
  100.     
  101.     
  102.     (set #Spezialfunktionen_Auswahl (cat
  103.     "\nMöchten Sie die Spezialfunktionen der \"stormamiga.lib\" nutzen.\n"))
  104.     
  105.     
  106.     (set #User.dic_Auswahl (cat
  107.     "\nUm das Syntax Highlighting auch für die Spezialfunktionen der \"stormamiga.lib\" nutzen zu können, ist es notwendig ein Benutzerlexikon zu installieren.\n"
  108.     "\nWählen Sie aus, ob und mit welchem Name das Benutzerlexikon installiert werden soll.\n"))
  109.     
  110.     (set #User1.dic         "User 1.dic")
  111.     (set #User2.dic         "User 2.dic")
  112.     (set #User3.dic         "User 3.dic")
  113.     (set #kein_User.dic     "Kein Benutzerlexikon installieren")
  114.     
  115.     
  116.     (set #Anleitungen_Auswahl (cat
  117.     "\nWählen Sie die Sprache(n) für die AmigaGuide Dokumentation aus.\n"
  118.     "\nDie mit \"(n/a)\" markierten Sprachen sind noch nicht verfügbar.\n"))
  119.     
  120.     (set #Deutsch   " Deutsch")
  121.     (set #English   " English  (n/a)")
  122.     (set #Italiano  " Italiano (n/a)")
  123.     (set #Français  " Français (n/a)")
  124.     
  125.     (set #Anleitungen_Liste (cat
  126.     "Installation der Anleitung(en).\n"
  127.     "Bitte wählen Sie ein Laufwerk oder ein Verzeichnis.\n"
  128.     "Es wird kein Verzeichnis erzeugt."))
  129.  )
  130.  (
  131.     (set #welcome (cat
  132.     "\nWelcome to the installation of the\n\n"
  133.     "\"stormamiga.lib\"\n\n"
  134.     ""stormamiga-Version" from "stormamiga-Datum_e"\n\n"
  135.     "This script installs the \"stormamiga.lib\"\n"
  136.     "according to your specification to your harddisk.\n\n\n"
  137.     "© Copyright 1996/97 by COMPIUTECK\n"
  138.     "written by Matthias Henze"))
  139.     
  140.     (set #Sprachstandard_Auswahl (cat
  141.     "\nPlease choose whether you like to install the \"stormamiga.lib\" for \"ANSI C\" or for \"C++\".\n"))
  142.     
  143.     (set #C         " ANSI C")
  144.     (set #C++       " C++")
  145.     
  146.     
  147.     (set #startup_Auswahl (cat
  148.     "\nIn \"ANSI C\" it is possible to use the startup codes \"stormamiga_startups.o\" and \"stormamiga_nc_startups.o\". This will make your programs shorter.\n"
  149.     "\nWhich startup code(s) do you want to install?\n"))
  150.     
  151.     (set #FAR_C_Startupcode     " \"stormamiga_startups.o\" (Far Code)")
  152.     (set #NEAR_C_Startupcode    " \"stormamiga_nc_startups.o\" (Near Code)")
  153.     
  154.     
  155.     (set #C++_startup_Auswahl (cat
  156.     "\nIn \"C++\" it is possible to use the startup codes \"stormamiga_C++_startups.o\" and \"stormamiga_nc_C++_startups.o\". This will make your programs shorter.\n"
  157.     "\nWhich startup code(s) do you want to install?\n"))
  158.     
  159.     (set #FAR_C_C++_Startupcode     " \"stormamiga_C++_startups.o\" (Far Code)")
  160.     (set #NEAR_C_C++_Startupcode    " \"stormamiga_nc_C++_startups.o\" (Near Code)")
  161.     
  162.     
  163.     (set #Versions_Auswahl (cat
  164.     "\nPlease choose the library(-ies) you want to install.\n"))
  165.     
  166.     (set #C++-Lib                   " expansion library for C++")
  167.     (set #MC68EC020+                " basic library for MC68EC020+")
  168.     (set #MC68EC020+_&_MC68881+     " expansion library for MC68881+")
  169.     (set #MC68040+                  " expansion library for MC68040+")
  170.     (set #MC68060                   " expansion library for MC68060")
  171.     
  172.     (set #Code_Modell_Auswahl (cat
  173.     "\nThe \"stormamiga.lib\" is available for the small and large code model.\n"
  174.     "\nWhich version(s) do you want to install?\n"))
  175.     
  176.     (set #Code_Modell_Auswahl_881 (cat
  177.     "\nThe \"stormamiga_881.lib\" is available for the small and large code model.\n"
  178.     "\nWhich version(s) do you want to install?\n"))
  179.     
  180.     (set #Code_Modell_Auswahl_040 (cat
  181.     "\nThe \"stormamiga_040.lib\" is available for the small and large code model.\n"
  182.     "\nWhich version(s) do you want to install?\n"))
  183.     
  184.     (set #Code_Modell_Auswahl_060 (cat
  185.     "\nThe \"stormamiga_060.lib\" is available for the small and large code model.\n"
  186.     "\nWhich version(s) do you want to install?\n"))
  187.     
  188.     (set #FAR_C     " large code model")
  189.     (set #NEAR_C    " small code model")
  190.     
  191.     (set #Standardbeispiele_Auswahl (cat
  192.     "\nI added some examples to show the advanages of the \"stormamiga.lib\".\n"
  193.     "\nDo you want to install these examples?\n"))
  194.     
  195.     (set #ja    "yes")
  196.     (set #nein  "no")
  197.     
  198.     (set #Beispiele_Liste (cat
  199.     "Installation of the examples.\n"
  200.     "Please choose a volume or directory.\n"
  201.     "A directory \"stormamiga_lib_Examples\" will be created automatically."))
  202.     
  203.     (set #Spezialbeispiele_Auswahl (cat
  204.     "\nI added some examples to show the advanages and features of the special functions.\n"
  205.     "If you allready installed the standard examples, the same destination directory will be used. If not, you may choose a destination directory.\n"
  206.     "\nDo you want to install these examples?\n"))
  207.     
  208.     
  209.     (set #Spezialfunktionen_Auswahl (cat
  210.     "\nDo you want to use the special functions of the \"stormamiga.lib\"?\n"))
  211.     
  212.     
  213.     (set #User.dic_Auswahl (cat
  214.     "\nTo make Syntax Highlighting also available for the special functions of the \"stormamiga.lib\", it is necessary to install a user dictonary.\n"
  215.     "\nPlease choose the name of the user dictionary if you like to install it.\n"))
  216.     
  217.     (set #User1.dic         "User 1.dic")
  218.     (set #User2.dic         "User 2.dic")
  219.     (set #User3.dic         "User 3.dic")
  220.     (set #kein_User.dic     "No user dictonary")
  221.     
  222.     
  223.     (set #Anleitungen_Auswahl (cat
  224.     "\nPlease choose the language(s) for the AmigaGuide documentation.\n"
  225.     "\nThe languages which are marked by \"(n/a)\" are not available yet.\n"))
  226.     
  227.     (set #Deutsch   " Deutsch")
  228.     (set #English   " English  (n/a)")
  229.     (set #Italiano  " Italiano (n/a)")
  230.     (set #Français  " Français (n/a)")
  231.     
  232.     (set #Anleitungen_Liste (cat
  233.     "Installation of the manual(s).\n"
  234.     "Please choose a volume or a directory.\n"
  235.     "A new directory will not be created."))
  236.  )
  237. )
  238.  
  239. ;=====================================================================================
  240. ; Beginn der Installation
  241. ;=====================================================================================
  242.  
  243. (message #welcome)
  244. (welcome)
  245.  
  246. (
  247.      (set C_C++_beides
  248.     (askoptions
  249.         (prompt #Sprachstandard_Auswahl)
  250.         (help   @askoptions-help)
  251.         (choices
  252.         #C++
  253.         #C
  254.         )
  255.     )
  256.     )
  257.  
  258.     (if (IN C_C++_beides 0) (set C++ 1))
  259.     (if (IN C_C++_beides 1) (set C 1))
  260.  
  261.     (if (= C 1)
  262.     (
  263.         (set kopiere_startups
  264.         (askoptions
  265.             (prompt #startup_Auswahl)
  266.             (help   @askoptions-help)
  267.             (choices
  268.             #FAR_C_Startupcode
  269.             #NEAR_C_Startupcode
  270.             )
  271.         )
  272.         )
  273.  
  274.         (if (IN kopiere_startups 0) (set FAR_C_Startupcode 1))
  275.         (if (IN kopiere_startups 1) (set NEAR_C_Startupcode 1))
  276.  
  277.         (if (= FAR_C_Startupcode 1)
  278.         (copyfiles
  279.             (source "StormSYS/stormamiga_startups.o")
  280.             (dest "StormC:StormSYS")
  281.         )
  282.         )
  283.         (if (= NEAR_C_Startupcode 1)
  284.         (copyfiles
  285.             (source "StormSYS/stormamiga_nc_startups.o")
  286.             (dest "StormC:StormSYS")
  287.         )
  288.         )
  289.     )
  290.     )
  291.     (if (= C++ 1)
  292.     ((
  293.         (set kopiere_C++_startups
  294.         (askoptions
  295.             (prompt #C++_startup_Auswahl)
  296.             (help   @askoptions-help)
  297.             (choices
  298.             #FAR_C_C++_Startupcode
  299.             #NEAR_C_C++_Startupcode
  300.             )
  301.         )
  302.         )
  303.  
  304.         (if (IN kopiere_C++_startups 0) (set FAR_C_C++_Startupcode 1))
  305.         (if (IN kopiere_C++_startups 1) (set NEAR_C_C++_Startupcode 1))
  306.  
  307.         (if (= FAR_C_C++_Startupcode 1)
  308.         (copyfiles
  309.             (source "StormSYS/stormamiga_C++_startups.o")
  310.             (dest "StormC:StormSYS")
  311.         )
  312.         )
  313.         (if (= NEAR_C_C++_Startupcode 1)
  314.         (copyfiles
  315.             (source "StormSYS/stormamiga_nc_C++_startups.o")
  316.             (dest "StormC:StormSYS")
  317.         )
  318.         )
  319.     )
  320.  
  321.     (
  322.       (set wähle_C++-Lib
  323.           (askoptions
  324.           (prompt #Versions_Auswahl)
  325.           (help   @askoptions-help)
  326.           (default 1)
  327.           (choices
  328.               #C++-Lib
  329.           )
  330.           )
  331.       )
  332.  
  333.  
  334.       (if (IN wähle_C++Lib 0)
  335.           (set kopiere_Libs (run "decrunch Lib/C++.lib"))
  336.           (copyfiles
  337.           (source "Lib/C++.lib")
  338.           (dest "StormC:Lib")
  339.           )
  340.       )
  341.     )
  342.     ))
  343. )
  344.  
  345. (
  346.    (set wähle_Libs
  347.     (askoptions
  348.         (prompt #Versions_Auswahl)
  349.         (help   @askoptions-help)
  350.         (default 1)
  351.         (choices
  352.         #MC68EC020+
  353.         #MC68EC020+_&_MC68881+
  354.         #MC68040+
  355.         #MC68060
  356.         )
  357.     )
  358.     )
  359.  
  360.  
  361.     (if (IN wähle_Libs 0) (set MC68EC020+  1))
  362.     (if (IN wähle_Libs 1) (set MC68EC020+_&_MC68881+ 1))
  363.     (if (IN wähle_Libs 2) (set MC68040+ 1))
  364.     (if (IN wähle_Libs 3) (set MC68060 1))
  365.  
  366.     (if (= MC68EC020+  1)
  367.     (
  368.         (set kopiere_Libs
  369.         (askoptions
  370.             (prompt #Code_Modell_Auswahl)
  371.             (help   @askoptions-help)
  372.             (choices
  373.             #FAR_C
  374.             #NEAR_C
  375.             )
  376.         )
  377.         )
  378.  
  379.         (if (IN kopiere_Libs 0) (set FAR_C 1))
  380.         (if (IN kopiere_Libs 1) (set NEAR_C 1))
  381.  
  382.  
  383.         (if (= FAR_C 1)
  384.            (copyfiles
  385.             (source "Lib/stormamiga.lib")
  386.             (dest "StormC:Lib")
  387.         )
  388.         )
  389.  
  390.         (if (= NEAR_C 1)
  391.         (copyfiles
  392.             (source "Lib/stormamiga_nc.lib")
  393.             (dest "StormC:Lib")
  394.         )
  395.         )
  396.     )
  397.     )
  398.  
  399.     (if (= MC68EC020+_&_MC68881+ 1)
  400.     ( (set FAR_C 0) (set NEAR_C 0)
  401.         (set kopiere_Libs
  402.         (askoptions
  403.             (prompt #Code_Modell_Auswahl_881)
  404.             (help   @askoptions-help)
  405.             (choices
  406.             #FAR_C
  407.             #NEAR_C
  408.             )
  409.         )
  410.         )
  411.  
  412.         (if (IN kopiere_Libs 0) (set FAR_C 1))
  413.         (if (IN kopiere_Libs 1) (set NEAR_C 1))
  414.  
  415.  
  416.         (if (= FAR_C 1)
  417.         (copyfiles
  418.             (source "Lib/stormamiga_881.lib")
  419.             (dest "StormC:Lib")
  420.         )
  421.         )
  422.  
  423.         (if (= NEAR_C 1)
  424.         (copyfiles
  425.             (source "Lib/stormamiga_nc_881.lib")
  426.             (dest "StormC:Lib")
  427.         )
  428.         )
  429.     )
  430.     )
  431.  
  432.     (if (= MC68040+  1)
  433.     ( (set FAR_C 0) (set NEAR_C 0)
  434.         (set kopiere_Libs
  435.         (askoptions
  436.             (prompt #Code_Modell_Auswahl_040)
  437.             (help   @askoptions-help)
  438.             (choices
  439.             #FAR_C
  440.             #NEAR_C
  441.             )
  442.         )
  443.         )
  444.  
  445.         (if (IN kopiere_Libs 0) (set FAR_C 1))
  446.         (if (IN kopiere_Libs 1) (set NEAR_C 1))
  447.  
  448.  
  449.         (if (= FAR_C 1)
  450.         (copyfiles
  451.             (source "Lib/stormamiga_040.lib")
  452.             (dest "StormC:Lib")
  453.         )
  454.         )
  455.  
  456.         (if (= NEAR_C 1)
  457.         (copyfiles
  458.             (source "Lib/stormamiga_nc_040.lib")
  459.             (dest "StormC:Lib")
  460.         )
  461.         )
  462.     )
  463.     )
  464.  
  465.     (if (= MC68060  1)
  466.     ( (set FAR_C 0) (set NEAR_C 0)
  467.         (set kopiere_Libs
  468.         (askoptions
  469.             (prompt #Code_Modell_Auswahl_060)
  470.             (help   @askoptions-help)
  471.             (choices
  472.             #FAR_C
  473.             #NEAR_C
  474.             )
  475.         )
  476.         )
  477.  
  478.         (if (IN kopiere_Libs 0) (set FAR_C 1))
  479.         (if (IN kopiere_Libs 1) (set NEAR_C 1))
  480.  
  481.  
  482.         (if (= FAR_C 1)
  483.         (copyfiles
  484.             (source "Lib/stormamiga_060.lib")
  485.             (dest "StormC:Lib")
  486.         )
  487.         )
  488.  
  489.         (if (= NEAR_C 1)
  490.         (copyfiles
  491.             (source "Lib/stormamiga_nc_060.lib")
  492.             (dest "StormC:Lib")
  493.         )
  494.         )
  495.     )
  496.     )
  497. )
  498.  
  499. (
  500.     (set kopiere_Standardbeispiele
  501.     (askchoice
  502.         (prompt #Standardbeispiele_Auswahl)
  503.         (help   @askchoice-help)
  504.         (default 0)
  505.         (choices
  506.         #ja
  507.         #nein
  508.         )
  509.     )
  510.     )
  511.     (if (= kopiere_Standardbeispiele 0)
  512.     (
  513.         (set Zielverzeichnis
  514.         (askdir
  515.             (prompt #Beispiele_Liste)
  516.             (help @askdir-help)
  517.             (default "StormC:Examples")
  518.         )
  519.         )
  520.         (makeassign "INST" Zielverzeichnis)
  521.         (copyfiles
  522.         (source "Beispiele/Standardbeispiele")
  523.         (dest "INST:stormamiga_lib_Examples")
  524.         (all)
  525.         (infos)
  526.         )
  527.     )
  528.     )
  529. )
  530.  
  531. (
  532.     (set Spezialfunktionen_Auswahl
  533.     (askchoice
  534.         (prompt #Spezialfunktionen_Auswahl)
  535.         (help   @askchoice-help)
  536.         (default 0)
  537.         (choices
  538.         #ja
  539.         #nein
  540.  
  541.         )
  542.     )
  543.     )
  544.  
  545.     (if (= Spezialfunktionen_Auswahl 0)
  546.     (
  547.         (copyfiles
  548.         (source "Include/stormamiga.h")
  549.         (dest "StormC:Include")
  550.         )
  551.  
  552.         (copyfiles
  553.         (source "Include/stormamigainline.h")
  554.         (dest "StormC:Include")
  555.         )
  556.  
  557.         (set kopiere_User.dic
  558.             (askchoice
  559.             (prompt #User.dic_Auswahl)
  560.             (help   @askchoice-help)
  561.             (default 0)
  562.             (choices
  563.                 #User1.dic
  564.                 #User2.dic
  565.                 #User3.dic
  566.                 #kein_User.dic
  567.             )
  568.             )
  569.         )
  570.  
  571.         (if (= kopiere_User.dic 0)
  572.             (copyfiles
  573.             (source "StormSYS/Dictionary/User.dic")
  574.             (dest "StormC:StormSYS/Dictionary")
  575.             (newname "User 1.dic")
  576.             )
  577.         )
  578.         (if (= kopiere_User.dic 1)
  579.             (copyfiles
  580.             (source "StormSYS/Dictionary/User.dic")
  581.             (dest "StormC:StormSYS/Dictionary")
  582.             (newname "User 2.dic")
  583.             )
  584.         )
  585.         (if (= kopiere_User.dic 2)
  586.             (copyfiles
  587.             (source "StormSYS/Dictionary/User.dic")
  588.             (dest "StormC:StormSYS/Dictionary")
  589.             (newname "User 3.dic")
  590.             )
  591.         )
  592.         (set kopiere_Spezialbeispiele
  593.             (askchoice
  594.             (prompt #Spezialbeispiele_Auswahl)
  595.             (help   @askchoice-help)
  596.             (default 0)
  597.             (choices
  598.                 #ja
  599.                 #nein
  600.             )
  601.             )
  602.         )
  603.         (if (= kopiere_Spezialbeispiele 0)
  604.             (
  605.             (if (exists "INST:stormamiga_lib_Examples" (noreq))
  606.                 (copyfiles
  607.                 (source "Beispiele/Spezialbeispiele")
  608.                 (dest "INST:stormamiga_lib_Examples")
  609.                 (all)
  610.                 (infos)
  611.                 )
  612.             )
  613.             (if (= (exists "INST:stormamiga_lib_Examples" (noreq))0)
  614.                 (
  615.                 (set Zielverzeichnis
  616.                     (askdir
  617.                     (prompt #Beispiele_Liste)
  618.                     (help @askdir-help)
  619.                     (default "StormC:Examples")
  620.                     )
  621.                 )
  622.                 (makeassign "INST" Zielverzeichnis)
  623.                 (copyfiles
  624.                     (source "Beispiele/Spezialbeispiele")
  625.                     (dest "INST:stormamiga_lib_Examples")
  626.                     (all)
  627.                     (infos)
  628.                 )
  629.                 )
  630.             )
  631.             )
  632.         )
  633.     )
  634.     )
  635. )
  636.  
  637. (
  638.     (set kopiere_Anleitungen
  639.     (askoptions
  640.         (prompt #Anleitungen_Auswahl)
  641.         (help   @askoptions-help)
  642.         (default 1)
  643.         (choices
  644.         #Deutsch
  645.         #English
  646.         #Italiano
  647.         #Français
  648.         )
  649.     )
  650.     )
  651.  
  652.  
  653.     (if (IN kopiere_Anleitungen 0)
  654.     (set Deutsch 1)
  655.     )
  656.     (if (IN kopiere_Anleitungen 1)
  657.     (set English 1)
  658.     )
  659.     (if (IN kopiere_Anleitungen 1)
  660.     (set Italiano 1)
  661.     )
  662.     (if (IN kopiere_Anleitungen 1)
  663.     (set Français 1)
  664.     )
  665.  
  666.     (if (= Deutsch 1)
  667.     (
  668.         (set Dokverzeichnis
  669.         (askdir
  670.             (prompt #Anleitungen_Liste)
  671.             (help @askdir-help)
  672.             (default "StormC:")
  673.         )
  674.         )
  675.         (makeassign "INSTDOK" Dokverzeichnis)
  676.         (copyfiles
  677.         (source "stormamiga_lib.guide")
  678.         (dest "INSTDOK:")
  679.         (infos)
  680.         )
  681.     )
  682.     )
  683.  
  684.     (if (= English 1)
  685.     (
  686.         (if (exists "INSTDOK:" (noreq))
  687.         (copyfiles
  688.             (source "stormamiga_lib_Eng.guide")
  689.             (dest "INSTDOK:")
  690.             (infos)
  691.         )
  692.         )
  693.         (if (= (exists "INSTDOK:" (noreq))0)
  694.         (
  695.             (set Dokverzeichnis
  696.             (askdir
  697.                 (prompt #Anleitungen_Liste)
  698.                 (help @askdir-help)
  699.                 (default "StormC:")
  700.             )
  701.             )
  702.             (makeassign "INSTDOK" Dokverzeichnis)
  703.             (copyfiles
  704.             (source "stormamiga_lib_Eng.guide")
  705.             (dest "INSTDOK:")
  706.             (infos)
  707.             )
  708.         )
  709.         )
  710.     )
  711.     )
  712.  
  713.     (if (= Italiano 1)
  714.     (
  715.         (if (exists "INSTDOK:" (noreq))
  716.         (copyfiles
  717.             (source "stormamiga_lib_Ital.guide")
  718.             (dest "INSTDOK:")
  719.             (infos)
  720.         )
  721.         )
  722.         (if (= (exists "INSTDOK:" (noreq))0)
  723.         (
  724.             (set Dokverzeichnis
  725.             (askdir
  726.                 (prompt #Anleitungen_Liste)
  727.                 (help @askdir-help)
  728.                 (default "StormC:")
  729.             )
  730.             )
  731.             (makeassign "INSTDOK" Dokverzeichnis)
  732.             (copyfiles
  733.             (source "stormamiga_lib_Ital.guide")
  734.             (dest "INSTDOK:")
  735.             (infos)
  736.             )
  737.         )
  738.         )
  739.     )
  740.     )
  741.  
  742.     (if (= Français 1)
  743.     (
  744.         (if (exists "INSTDOK:" (noreq))
  745.         (copyfiles
  746.             (source "stormamiga_lib_Franç.guide")
  747.             (dest "INSTDOK:")
  748.             (infos)
  749.         )
  750.         )
  751.         (if (= (exists "INSTDOK:" (noreq))0)
  752.         (
  753.             (set Dokverzeichnis
  754.             (askdir
  755.                 (prompt #Anleitungen_Liste)
  756.                 (help @askdir-help)
  757.                 (default "StormC:")
  758.             )
  759.             )
  760.             (makeassign "INSTDOK" Dokverzeichnis)
  761.             (copyfiles
  762.             (source "stormamiga_lib_Franç.guide")
  763.             (dest "INSTDOK:")
  764.             (infos)
  765.             )
  766.         )
  767.         )
  768.     )
  769.     )
  770. )
  771. (makeassign "INST")
  772. (makeassign "INSTDOK")
  773.